R/demo_time series_barplot.R

In DrBo0m/PontiR: What the Package Does (One Line, Title Case)

library(ggplot2)
library(ggplot2)
library(dplyr)

# Dummy data
data <- data.frame(
  day = as.Date("2017-06-14") - 0:364,
  value = runif(365) + seq(-140, 224)^2 / 10000
)

# Most basic bubble plot
p <- ggplot(data, aes(x=day, y=value))+
  geom_bar(stat = "identity") +
  xlab("")
p